<?php
 Include ("../../include/var_temp.inc") ;
 // ----------------------- SAISIE AVEC EDT ---------------------
 // Choix de la classe a relever
 If (IsSet ($saisie))
  {
   // Variables : menu, saisie, dt, classe, nbr_el
   //         $i = 0 a $nbr_el-1
   //             eleve : el_$i
   //             repere_1 : r1_$i
   //             repere2 : r2_$i
   //             nombre de tranches : n_$i_0
   //          $j = 1 a n_$i_0
   //             valeur saisie : v_$i_$j
   //             tranche horaire : t_$i_$j
   //             nombre tranche : n_$i_$j
   //             numero groupe : g_$i_$j 
   //             id releve existant : ar_$i_$j (mise a jour si a 1)
   //             professeur : p_$i_$j
   //             numen : num_$i_$j
   //             discipline : d_$i_$j
   //             code discipline : cd_$i_$j
   //
   If ($saisie = 1)
    {
     $req_ins_releves = "INSERT INTO abs_releves (id_abs_releve,prof,numen,discipline,code_disc,date,tranche,date_initiale,heure_initiale,saisie_initiale,date_modif,heure_modif,saisie_modif,cours_reporte) VALUES " ;
     $req_ins_saisies = "INSERT INTO abs_saisies (id_abs_saisie,prof,numen,discipline,code_disc,date,tranche,eleve,repere1,repere2,type,commentaires,arrivee,regularisation) VALUES " ;
     $ins_rel = 0 ;
     $ins_sai = 0 ;
     $tb_ins_rel [0][0] = 0 ;
     $tb_maj_rel [0] = 0 ;
     //echo "nbr el=".$nbr_el."-classe=".$id_classe."-dt=".$dt."<BR>" ;
     For ($i = 0 ; $i < $nbr_el ; $i++)
      {
       $eleve = "\$el_".$i ; Eval ("\$eleve=\"$eleve\";") ;
       $rep1 = "\$r1_".$i ; Eval ("\$rep1=\"$rep1\";") ;
       $rep2 = "\$r2_".$i ; Eval ("\$rep2=\"$rep2\";") ;
       $nt = "\$n_".$i."_0" ; Eval ("\$nt=\"$nt\";") ;
       //echo "el=".$eleve."-r1=".$rep1."-r2=".$rep2."-nt=".$nt."<BR>" ;
       $ok_l = 0 ;
       For ($j = 1 ; $j <= $nt ; $j++)
        {
         $releve = "\$releve_".$j."_0" ; Eval ("\$releve=\"$releve\";") ;
         If ($releve == 1)
          {
           $v = "\$v_".$i."_".$j ; Eval ("\$v=\"$v\";") ;
           If ($v > 0)
            {
             // Si NON PRESENT
             $t = "\$t_".$i."_".$j ; Eval ("\$t=\"$t\";") ;
             $n = "\$n_".$i."_".$j ; Eval ("\$n=\"$n\";") ;
             $g = "\$g_".$i."_".$j ; Eval ("\$g=\"$g\";") ;
   	     $p = "\$p_".$i."_".$j ; Eval ("\$p=\"$p\";") ;
	     $num = "\$num_".$i."_".$j ; Eval ("\$num=\"$num\";") ;
	     $d = "\$d_".$i."_".$j ; Eval ("\$d=\"$d\";") ;
	     $cd = "\$cd_".$i."_".$j ; Eval ("\$cd=\"$cd\";") ;
	     //echo " v=".$v."-t=".$t."-n=".$n."-g=".$g."-p=".$p."-num=".$num."-d=".$d."-cd=".$cd."-" ;
	     For ($k = 0 ; $k < $n ; $k++)
	      {
	       $ar = "\$ar_".$i."_".$j."_".$k ; Eval ("\$ar=\"$ar\";") ;
	       If ($ar > 0)
	        {
	         // RELEVE EXISTANT : MISE A JOUR RELEVE ET MAJ SAISIE OU INSERTION SAISIE (SI N'EXISTE PAS)
	         If ((integer)$tb_maj_rel [$ar] <> 1)
	          {
	           // NON FAIT
	           $releve = SQL_commande ("SELECT * FROM abs_releves WHERE id_abs_releve='".$ar."' LIMIT 1", $id_sql) ;
	           $rlv = SQL_tableau_associatif ($releve, "") ;
	           $requete = "UPDATE abs_releves SET date_modif='".Date ("Y-m-d")."',heure_modif='".Date ("H:i:s")."',saisie_modif='".$id_util."' WHERE id_abs_releve='".$ar."' LIMIT 1" ;
	           //echo $requete."<BR>" ;
	           $ok_r = SQL_commande ($requete, $id_sql) ;
                  }
                 // Recherche saisie de toutes les tranches
	         $tranche = tranche_horaire_suivante ($t,$k) ;
	         $resultats = SQL_commande ("SELECT id_abs_saisie FROM abs_saisies WHERE prof='".$p."' AND discipline='".$d."'
	   				        AND date='".$dt."' AND tranche='".$tranche."' AND eleve='".$eleve."'", $id_sql) ;
                 If (SQL_nbr_lignes ($resultats) > 0)
		  {
                   // MISE A JOUR D'UNE SAISIE
		   For ($mm = 0 ; $mm < SQL_nbr_lignes ($resultats) ; $mm++)
		    {
		     $maj_saisie = SQL_ligne_suivante ($resultats) ;
		     $requete = "UPDATE abs_saisies SET type='".$v."' WHERE id_abs_saisie='".$maj_saisie [0]."' LIMIT 1" ;
		     //echo $requete."<BR>" ;
		     $ok_r = SQL_commande ($requete, $id_sql) ;
		    }
                  }
                 Else
		  {
		   // INSERTION D'UNE SAISIE
  		   $tranche = tranche_horaire_suivante ($t,$k) ;
		   If ($ins_sai == 1) { $req_ins_saisies .= "," ; }
                   $req_ins_saisies .= "('','".$p."','".$num."','".$d."','".$cd."','".$dt."','".$tranche."','".$eleve."','".$rep1."','".$rep2."','".$v."','','00:00:00','0')" ;
		   $ins_sai = 1 ;
		  }
		 $tb_maj_rel [$ar] = 1 ;
                }
               Else
	        {
	         // NOUVELLE INSERTION : RELEVE ET SAISIE
	         $tranche = tranche_horaire_suivante ($t,$k) ;
		 If ((integer)$tb_ins_rel [$p][$tranche] <> 1)
		  {
		   // INSERTION D'UN NOUVEAU RELEVE
		   If ($ins_rel == 1) { $req_ins_releves .= "," ; }
		   $req_ins_releves .= "('','".$p."','".$num."','".$d."','".$cd."','".$dt."','".$tranche."','".Date ("Y-m-d")."','".Date ("H:i:s")."','".$id_util."','".Date ("Y-m-d")."','".Date ("H:i:s")."','".$id_util."','0')" ;
		   $ins_rel = 1 ;
		   $tb_ins_rel [$p][$tranche] = 1 ;
                  }
                 // INSERTION D'UNE NOUVELLE SAISIE
                 If ($ins_sai == 1) { $req_ins_saisies .= "," ; }
                 $req_ins_saisies .= "('','".$p."','".$num."','".$d."','".$cd."','".$dt."','".$tranche."','".$eleve."','".$rep1."','".$rep2."','".$v."','','00:00:00','0')" ;
		 $ins_sai = 1 ;
		}
	       //echo " ar".$k."=".$ar."=" ;
              }
	     $ok_l = 1 ;
            }
           Else
            {
	     // SI PRESENT (Avec eventuellement un changement dans un releve existant) -> DESTRUCTION EVENTUELLE
	     $t = "\$t_".$i."_".$j ; Eval ("\$t=\"$t\";") ;
	     $n = "\$n_".$i."_".$j ; Eval ("\$n=\"$n\";") ;
	     $g = "\$g_".$i."_".$j ; Eval ("\$g=\"$g\";") ;
	     $p = "\$p_".$i."_".$j ; Eval ("\$p=\"$p\";") ;
	     $num = "\$num_".$i."_".$j ; Eval ("\$num=\"$num\";") ;
	     $d = "\$d_".$i."_".$j ; Eval ("\$d=\"$d\";") ;
	     $cd = "\$cd_".$i."_".$j ; Eval ("\$cd=\"$cd\";") ;
	     For ($k = 0 ; $k < $n ; $k++)
	      {
	       $ar = "\$ar_".$i."_".$j."_".$k ; Eval ("\$ar=\"$ar\";") ;
	       If ($ar > 0)
	        {
	         // RELEVE existant alors destruction des saisies
	         // Recherche d'une saisie
	         $tranche = tranche_horaire_suivante ($t,$k) ;
	         $resultats = SQL_commande ("SELECT id_abs_saisie FROM abs_saisies WHERE prof='".$p."' AND discipline='".$d."' AND date='".$dt."' AND tranche='".$tranche."' AND eleve='".$eleve."'", $id_sql) ;
                 If (SQL_nbr_lignes ($resultats) > 0)
		  {
                   // DESTRUCTIONS D'UNE SAISIE
		   For ($mm = 0 ; $mm < SQL_nbr_lignes ($resultats) ; $mm++)
		    {
		     $maj_saisie = SQL_ligne_suivante ($resultats) ;
		     $requete = "DELETE FROM abs_saisies WHERE id_abs_saisie='".$maj_saisie [0]."' LIMIT 1" ;
		     //echo $requete."<BR>" ;
		     $ok_r = SQL_commande ($requete, $id_sql) ;
		    }
                  }
                }
               Else
	        {
	         // PAS DE RELEVE : CREATION
	         $tranche = tranche_horaire_suivante ($t,$k) ;
	         If ((integer)$tb_ins_rel [$p][$tranche] <> 1)
	          {
	           // INSERTION D'UN NOUVEAU RELEVE
	           If ($ins_rel == 1) { $req_ins_releves .= "," ; }
	           $req_ins_releves .= "('','".$p."','".$num."','".$d."','".$cd."','".$dt."','".$tranche."','".Date ("Y-m-d")."','".Date ("H:i:s")."','".$id_util."','".Date ("Y-m-d")."','".Date ("H:i:s")."','".$id_util."','0')" ;
	           $ins_rel = 1 ;
	           $tb_ins_rel [$p][$tranche] = 1 ;
                  }
	        }
              }
	    }
	  }
         Else
	  {
	   // Pas de releve : Si existe alors destruction si ce n'est pas un prof.
	   $n = "\$n_".$i."_".$j ; Eval ("\$n=\"$n\";") ;
	   For ($k = 0 ; $k < $n ; $k++)
	    {
	     $ar = "\$ar_".$i."_".$j."_".$k ; Eval ("\$ar=\"$ar\";") ;
	     If ($ar > 0)
	      {
	       // Releve existant : Est-ce un prof ?
	       $resultats = SQL_commande ("SELECT u.droits FROM abs_releves r, utilisateurs u
	                                    WHERE r.id_abs_releve='".$ar."' AND r.saisie_initiale=u.id_utilisateur LIMIT 1", $id_sql) ;
               If (SQL_nbr_lignes ($resultats) > 0)
		{
		 // Existe donc on regarde si c'est un prof
		 $result = SQL_ligne_suivante ($resultats) ;
		 If ((integer)$result [0] == $droit_prof)
		  {
		   // Oui !
		  }
                 Else
		  {
		   // Non c'est pas un prof : on efface !
		   //echo "DELETE FROM abs_releves WHERE id_abs_releve='".$ar."' LIMIT 1<BR>" ;
		   $efface = SQL_commande ("DELETE FROM abs_releves WHERE id_abs_releve='".$ar."' LIMIT 1", $id_sql) ;
                  }
	        }
              }
	    }
	  }
	}
       //If ($ok_l) { echo "<BR>" ; }
      }
     //
     // Lance les requetes d'insertion
     //
     If ($ins_rel == 1)
      {
       //echo $req_ins_releves."<BR>" ;
       $ok_r = SQL_commande ($req_ins_releves, $id_sql) ;
      }
     //
     // Lance les requetes de saisie
     //
     If ($ins_sai == 1)
      {
       //echo $req_ins_saisies."<BR>" ;
       $ok_r = SQL_commande ($req_ins_saisies, $id_sql) ;
      }
    }
   $message = 1 ;
   $choix_date = 2 ;
  }
 // ---------------------------------------------------------------------------------------
 // Debut de saisie
    
 Echo "<HTML><HEAD>" ;
 entete_html ("Garennes", "", 1) ;
 Echo styles ("none", "none", "none", $l ["lien"], "none") ;
 //Include ("./module_absence.js") ;
 $saisie = SQL_commande ("SELECT * FROM abs_types_saisie ORDER BY nom_g,nom_f", $id_sql) ;
 $s [0][0] = SQL_nbr_Lignes ($saisie) ;
 For ($i = 1 ; $i <= SQL_nbr_Lignes ($saisie) ; $i++)
  {
   $sais = SQL_tableau_associatif ($saisie, "") ;
   $s [$i][0] = $sais ["type" ] ;
   $s [$i][1] = $sais ["image_1_f" ] ;
   $s [$i][2] = $sais ["image_2_f" ] ;
   $s [$i][3] = $sais ["image_1_g" ] ;
   $s [$i][4] = $sais ["image_2_g" ] ;
  }
	      Echo "  <SCRIPT>\n" ;
	      // image : document... image a changer
	      // donnee : document... donnee a changer
	      // image1 : URL de l'image "OK"
	      // image2 : URL de l'image "NON OK"
	      Echo "   function change_releve(image,donnee,donnee2,image1,image2)\n" ;
	      Echo "    {\n" ;
	      Echo "     if (donnee.value==0)\n" ;
	      Echo "      {\n" ;
	      Echo "       image.src=image1\n" ;
	      Echo "       donnee.value=1\n" ;
	      Echo "       donnee2.value=1\n" ;
	      Echo "      }\n" ;
              Echo "     else\n" ;
	      Echo "      {\n" ;
	      Echo "       image.src=image2\n" ;
	      Echo "       donnee.value=0\n" ;
	      Echo "       donnee2.value=0\n" ;
	      Echo "      }\n" ;
	      Echo "    }\n" ;
	      // image : URL de l'image
	      // valeur : document... valeur a changer
	      // mode : 1 : Feminin
	      //        0 : Masculin
	      Echo "   function change(image,valeur,mode)\n" ;
	      Echo "    {\n" ;
	      Echo "     if (mode==1)\n" ;
              Echo "      {\n" ;
	      For ($i = 1 ; $i < $s [0][0] ; $i++)
	       {
	        If ($i == 1) { Echo "      " ; }
	        Echo " if (valeur.value==".$s [$i][0].")\n" ;
		Echo "        {\n" ;
		Echo "         image.src='".$s [($i+1)][1]."'\n" ;
		Echo "         valeur.value=".$s [($i+1)][0]."\n" ;
		Echo "        }\n" ;
		Echo "       else" ;
	       }
              Echo " if (valeur.value==".$s [$i][0].")\n" ;
	      Echo "        {\n" ;
	      Echo "         image.src='../images/absences/alheure.png'\n" ;
	      Echo "         valeur.value=0\n" ;
	      Echo "        }\n" ;
	      Echo "       else\n" ;
	      Echo "        {\n" ;
	      Echo "         image.src='".$s [1][1]."'\n" ;
	      Echo "         valeur.value=".$s [1][0]."\n" ;
	      Echo "        }\n" ;
	      Echo "      }\n" ;
	      Echo "     else\n" ;
	      Echo "      {\n" ;
	      For ($i = 1 ; $i < $s [0][0] ; $i++)
	       {
	        If ($i == 1) { Echo "      " ; }
		Echo " if (valeur.value==".$s [$i][0].")\n" ;
		Echo "        {\n" ;
		Echo "         image.src='".$s [($i+1)][3]."'\n" ;
		Echo "         valeur.value=".$s [($i+1)][0]."\n" ;
		Echo "        }\n" ;
		Echo "       else " ;
	       }
              Echo " if (valeur.value==".$s [$i][0].")\n" ;
	      Echo "        {\n" ;
	      Echo "         image.src='../images/absences/alheure.png'\n" ;
	      Echo "         valeur.value=0\n" ;
	      Echo "        }\n" ;
	      Echo "       else\n" ;
	      Echo "        {\n" ;
	      Echo "         image.src='".$s [1][3]."'\n" ;
	      Echo "         valeur.value=".$s [1][0]."\n" ;
	      Echo "        }\n" ;
	      Echo "      }\n" ;
	      Echo "    }\n" ;
	      Echo "  </SCRIPT>\n" ;
	      Include ("./abs_fenetre.js") ;
              Echo " </HEAD>\n" ;

              $resultats = SQL_commande ("SELECT * FROM menus WHERE numero='$droit_courant' ORDER BY ordre", $id_sql) ;
              $ligne = SQL_tableau_associatif ($resultats, "") ;
	      
	      $nom_classe = nom_classe_long_parid ($id_classe) ;
              $effectifs = effectif ($id_classe) ;
	      
              Echo " <BODY BACKGROUND=\"../images/fond.png\" TEXT=\"".$ligne ["couleur_texte"]."\">\n" ;
	      Echo "  <SCRIPT> top.travail.travail_menu.document.id_classe.id_classe.value=0 </SCRIPT>\n" ;

              Echo "  <SCRIPT>\n" ;
              Echo "   top.menu_status.document.clear ()\n" ;
              Echo "   top.menu_status.document.close ()\n" ;
              Echo "   top.menu_status.document.writeln (\"<HTML>\")\n" ;
              Echo "   top.menu_status.document.writeln (\" <BODY BGCOLOR=\\\"".$l ["couleur_fond"]."\\\">\")\n" ;
              Echo "   top.menu_status.document.writeln (\"  <CENTER><FONT COLOR=\\\"".$l ["couleur_texte"]."\\\"><B>Classe</B></FONT></CENTER>\")\n" ;
              Echo "   top.menu_status.document.writeln (\"  <TABLE BGCOLOR=\\\"".$l ["lien"]."\\\" BORDER=0 WIDTH=\\\"90%\\\" ALIGN=\\\"CENTER\\\"CELLSPACING=0 CELLPADDING=0>\")\n" ;
              Echo "   top.menu_status.document.writeln (\"   <TR>\")\n" ;
              Echo "   top.menu_status.document.writeln (\"    <TD ALIGN=CENTER VALIGN=MIDDLE HEIGHT=\\\"100%\\\">&nbsp;<B>" ;
              If (StrLen ($nom_classe) > 14) { Echo "<FONT SIZE=\\\"-2\\\">".$nom_classe."</FONT>" ; } Else { Echo $nom_classe ; }
              Echo "</B>&nbsp;<BR>&nbsp;(".$effectifs."&nbsp;&eacute;l&egrave;ves)&nbsp;</TD>\")\n" ;
              Echo "   top.menu_status.document.writeln (\"   </TR>\")\n" ;
              Echo "   top.menu_status.document.writeln (\"  </TABLE>\")\n" ;
              Echo "   top.menu_status.document.writeln (\" </BODY>\")\n" ;
              Echo "   top.menu_status.document.writeln (\"</HTML>\")\n" ;
              Echo "  </SCRIPT>\n" ;
	      
	      $requete = "SELECT * FROM eleves WHERE classe='".$id_classe."' ORDER BY nom,prenoms" ;
	      $eleves = SQL_commande ($requete, $id_sql) ;
	      If (SQL_nbr_lignes ($eleves) > 0)
	       {
	        // Saisie releves
		//$dt = Date ("Y-m-d") ;
		//$jour = Date ("w") ;
		Include ("../include/absences.cfg") ;
		$choix_date = var_courante ("choix_date", 0, 0) ;
		Switch ($choix_date)
		 {
		   Case 1 : $num_jour = var_courante ("num_jour", 0, Date ("d")) ;
		            $num_mois_annee = var_courante ("num_mois_annee", 0, Date ("m-Y")) ;
		            //$dt = $num_annee."-".$num_mois."-".$num_jour ;
		            $mois_annee = Explode ("-", $num_mois_annee) ;
			    $dt = $mois_annee [1]."-".$mois_annee [0]."-".$num_jour ;
		            Break ;
                   Case 2 : $dt = var_courante ("dt", 0, Date ("Y-m-d")) ;
		            Break ;
                  Default : If (Date ("H:i:s") < $heure_decalage)
		             {
			      //$dt = Date ("Y-m-d", MkTime(0,0,0,Date ("m"),Date("d")-$decalage_matin,Date("Y"))) ;
			      $dt = premier_jour_ouvrable (Date ("Y-m-d", MkTime(0,0,0,Date ("m"),Date("d")-$decalage_matin,Date("Y"))), 0) ;
			      If ($dt == "0") { $dt = premier_jour_ouvrable (Date ("Y-m-d", MkTime(0,0,0,Date ("m"),Date("d")-Floor ($decalage_matin/2),Date("Y"))), -1) ; }
                             }
		            Else
			     {
			      //$dt = Date ("Y-m-d", MkTime(0,0,0,Date ("m"),Date("d")-$decalage_am,Date("Y"))) ;
			      $dt = premier_jour_ouvrable (Date ("Y-m-d", MkTime(0,0,0,Date ("m"),Date("d")-$decalage_am,Date("Y"))), 0) ;
			      If ($dt == "0") { $dt = premier_jour_ouvrable (Date ("Y-m-d", MkTime(0,0,0,Date ("m"),Date("d")-Floor ($decalage_matin/2),Date("Y"))), -1) ; }
                             }
			    Break ;
                 }
		$heure = Date ("h:i:s") ;
		$jour = Date ("w", MkTime (0,0,0,(integer)SubStr ($dt, 5, 2),(integer)SubStr ($dt, 8, 2),(integer)SubStr ($dt, 0, 4))) ;
		
		$ns = numero_semaine ($dt) ; If ($ns < 10) { $ns = "0".$ns ; }
		// Est-ce ouvrable ?
		$ouv = SQL_commande ("SELECT ouvrable FROM abs_calendrier WHERE date='".$dt."' LIMIT 1", $id_sql) ;
		$o = SQL_ligne_suivante ($ouv) ;
		If ($o [0] == 1)
		 {
		  // Jour ouvrable
		  
		  // Recherche les saisies possibles
		  $saisies = SQL_commande ("SELECT * FROM abs_types_saisie WHERE droits<='".$droit_prof."' ORDER BY nom_g,nom_f", $id_sql) ;
	          $s [0][0] = SQL_nbr_lignes ($saisies) ;
	          For ($i = 1 ; $i <= SQL_nbr_lignes ($saisies) ; $i++)
	           {
	            $ligne = SQL_tableau_associatif ($saisies, "") ;
	            $s [$i][0] = $ligne ["type"] ;
	            $s [$i][1] = $ligne ["nom_f"] ;
		    $s [$i][2] = $ligne ["nom_g"] ;
		    $s [$i][3] = $ligne ["heure"] ;
		    $s [$i][4] = $ligne ["couleur_fond"] ;
		    $s [$i][5] = $ligne ["couleur_texte"] ;
		    $s [$i][6] = $ligne ["image_1_f"] ;
		    $s [$i][7] = $ligne ["image_2_f"] ;
		    $s [$i][8] = $ligne ["image_1_g"] ;
		    $s [$i][9] = $ligne ["image_2_g"] ;
	           }
		  
		  // Recherche horaires et correspondances
		  $h = SQL_commande ("SELECT * FROM abs_horaires ORDER By debut", $id_sql) ;
		  $heures [0] = SQL_nbr_lignes ($h) ;
		  For ($i = 1 ; $i <= $heures [0] ; $i++)
		   {
		    $hr = SQL_tableau_associatif ($h, "") ;
		    $heures [(integer)$hr ["id_abs_horaire"]] = $i ;
		    $heures_debut [$i] = $hr ["debut"] ;
		    $heures_fin [$i] = $hr ["fin"] ;
		   }
                  $requete = "SELECT u.id_utilisateur,u.numen,u.nom,u.prenom,
		                     d.id_discipline,d.nom_long,d.nom_court,d.nom_bref,d.code AS code_disc,
			             a.id_abs_edt,a.abs_groupe,
			             s.nom AS nom_salle,
                                     v.sem".$ns." AS valide,v.code,
				     h.id_abs_horaire,h.debut,h.fin
                                FROM abs_edt a, utilisateurs u, disciplines d, abs_salles s, abs_horaires h, abs_validites v
                               WHERE a.classe='".$id_classe."'
			         AND a.professeur=u.id_utilisateur
			         AND a.discipline=d.id_discipline
			         AND a.abs_horaire=h.id_abs_horaire
			         AND a.abs_salle=s.id_abs_salle
			         AND a.abs_validite=v.id_abs_validite
			         AND a.jour='".$jour."'
                            ORDER BY h.debut,u.nom,u.prenom,d.id_discipline,d.nom_bref,d.nom_court,d.nom_long" ;
		  $edt = SQL_commande ($requete, $id_sql) ;
                  $cell [0][0][0] = 0 ;
                  If (SQL_nbr_lignes ($edt) > 0)
                   {
		    $max = 0 ;
		    // Parcours les edt trouvees
		    For ($i = 0 ; $i < SQL_nbr_lignes ($edt) ; $i++)
		     {
		      $seq = SQL_tableau_associatif ($edt, "") ;
		      // Semaine valide (cours Semaine Impaire/Semaine Paire par exemple)
		      If ($seq ["valide"] == 1)
		       {
		        $j = 1 ;
			// Recherche de la discipline en cours (deja traitee ?)
		        $ok = 0 ;
		        While (($j <= $cell [0][0][0]) And ($ok == 0))
		         {
		          If (($cell [$j][0][0] == $seq ["id_discipline"]) And ($cell [$j][0][4] == $seq ["id_utilisateur"])) { $ok = 1 ; }
		  	  Else { $j++ ; }
		         }
		        $tr = tranches_identiques ($seq ["id_utilisateur"],$dt,$jour,$seq["debut"],$id_classe,$seq["abs_groupe"],$seq["id_discipline"]) ;
			$num_th = (integer)$seq ["id_abs_horaire"] ;
                        If ($ok == 1)
		         {
		          // Discipline deja traitee : on complete
		          $cell [$j][$heures [$num_th]][0] = 1 ; // Heure enseignee
		          $cell [$j][$heures [$num_th]][1] = (integer)$seq ["id_utilisateur"] ; // Id prof
		          $cell [$j][$heures [$num_th]][2] = $seq ["nom"] ; //  Nom prof
		          $cell [$j][$heures [$num_th]][3] = $seq ["prenom"] ; // Prenom prof
		          $cell [$j][$heures [$num_th]][4] = (integer)$seq ["id_abs_edt"] ; // Id EDT
		          $cell [$j][$heures [$num_th]][5] = (integer)$seq ["abs_groupe"] ; // Id groupe
		          $cell [$j][$heures [$num_th]][6] = $seq ["nom_salle"] ; // Nom de la salle
		          $cell [$j][$heures [$num_th]][7] = (integer)$seq ["valide"] ; // Valide
		          $cell [$j][$heures [$num_th]][7] = $seq ["code"] ; // Code de la validite
			  $cell [$j][$heures [$num_th]][8] = (integer)$tr [0][0] ; // Nombre de tranches consecutives
			  $cell [$j][$heures [$num_th]][9] = 1 ;
			  If ((integer)$seq ["abs_groupe"] > 0)
			   {
			    $grp = SQL_commande ("SELECT * FROM abs_groupes_classe WHERE id_abs_groupe_classe='".$seq ["abs_groupe"]."' LIMIT 1", $id_sql) ;
			    $g = SQL_tableau_associatif ($grp, "") ;
			    $cell [$j][$heures [$num_th]][10] = $g ["code_groupe"] ; // Code du groupe
			    $cell [$j][$heures [$num_th]][12] = $g ["id_abs_groupe_classe"] ; // Id groupe
			   }
                          Else
			   {
			    $cell [$j][$heures [$num_th]][10] = "" ; // Pas de code
			    $cell [$j][$heures [$num_th]][12] = 0 ; // Classe entiere
			   }
                          $cell [$j][$heures [$num_th]][11] = $heures [numero_tranche_horaire ($tr [0][1])] ; // Heure de debut
			  $cell [$j][$heures [$num_th]][13] = numero_tranche_horaire ($tr [0][1]) ; // Numero de tranche horaire
		         }
                        Else
		         {
		          // Discipline non traitee : on cre
		          $cell [0][0][0]++ ;
		  	  $cell [0][$heures [$num_th]][0] = 0 ;
		          $cell [$cell [0][0][0]][0][0] = (integer)$seq ["id_discipline"] ;
		          $cell [$cell [0][0][0]][0][1] = $seq ["nom_long"] ;
		          $cell [$cell [0][0][0]][0][2] = $seq ["nom_court"] ;
		          $cell [$cell [0][0][0]][0][3] = $seq ["nom_bref"] ;
			  $cell [$cell [0][0][0]][0][4] = (integer)$seq ["id_utilisateur"] ;
			  $cell [$cell [0][0][0]][0][5] = $seq ["numen"] ;
			  $cell [$cell [0][0][0]][0][6] = $seq ["code_disc"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][0] = 1 ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][1] = (integer)$seq ["id_utilisateur"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][2] = $seq ["nom"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][3] = $seq ["prenom"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][4] = (integer)$seq ["id_abs_edt"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][5] = (integer)$seq ["abs_groupe"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][6] = $seq ["nom_salle"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][7] = (integer)$seq ["valide"] ;
		          $cell [$cell [0][0][0]][$heures [$num_th]][7] = $seq ["code"] ;
			  $cell [$cell [0][0][0]][$heures [$num_th]][8] = (integer)$tr [0][0] ;
			  $cell [$cell [0][0][0]][$heures [$num_th]][9] = 1 ;
			  If ((integer)$seq ["abs_groupe"] > 0)
			   {
			    $grp = SQL_commande ("SELECT * FROM abs_groupes_classe WHERE id_abs_groupe_classe='".$seq ["abs_groupe"]."' LIMIT 1", $id_sql) ;
			    $g = SQL_tableau_associatif ($grp, "") ;
			    $cell [$cell [0][0][0]][$heures [$num_th]][10] = (integer)$g ["code_groupe"] ;
			    $cell [$cell [0][0][0]][$heures [$num_th]][12] = (integer)$g ["id_abs_groupe_classe"] ;
			   }
                          Else
			   {
			    $cell [$cell [0][0][0]][$heures [$num_th]][10] = "" ;
			    $cell [$cell [0][0][0]][$heures [$num_th]][12] = 0 ;
			   }
                          $cell [$cell [0][0][0]][$heures [$num_th]][11] = $heures [numero_tranche_horaire ($tr [0][1])] ;
			  $cell [$cell [0][0][0]][$heures [$num_th]][13] = numero_tranche_horaire ($tr [0][1]) ;
		         }
                        If ($heures [$num_th] > $max) { $max = $heures [$num_th] ; }
                       }
                     }
		   }
                  
		  // Comptage du nombre de discipline par tranche horaire
		  For ($j = 1 ; $j <= $max ; $j++)
		   {
		    For ($i = 1 ; $i <= $cell [0][0][0] ; $i++)
		     {
		      If ($cell [$i][$j][0] == 1) { $cell [0][$j][0]++ ; }
                     }
                   }
                  
		  // Affichage
		  // Parcours toutes les discipines
		  $nbr = 0 ;
		  $t_h [0][0][0] = 0 ;
		  $num_cl = 0 ;
		  $comp_h = 0 ;
		  // Lecture des constantes
		  $gstn = SQL_commande ("SELECT * FROM abs_gestion LIMIT 1",$id_sql) ;
		  $gestion = SQL_tableau_associatif ($gstn, "") ;
		  $duree_s = (integer)$gestion ["duree_sequence"] ;
		  
		  For ($i = 1 ; $i <= $cell [0][0][0] ; $i++)
		   {
		    $ok = 0 ;
		    $lg = "" ;
		    $rl = "" ;
		    // Parcours les heures
		    $inc = 1 ;
		    $j = 1 ;
		    $vide = 0 ;
		    While ($j <= $max) 
		     {
		      // Recherche de la premiere discipline non fixee
		      $k = 1 ;
		      While ((($cell [$k][$j][9] != 1) Or ($cell [$k][$j][11] != $j)) And ($k <= $cell [0][0][0]))
		       { $k++ ; }                    
		      If (($k <= $cell [0][0][0]) And ((integer)$cell [$k][$j][9] == 1) And ($cell [$k][$j][11] == $j))
		       {
		        // -- COURS POSSIBLE --
		        // Comble le vide
			If ($vide > 0)
			 {
			  $lg .= "<TD ROWSPAN=2" ; If ($vide > 1) { $lg .= " COLSPAN=\"".$vide."\"" ; }
			  //$lg .= " STYLE=\"border-color:".$l ["couleur_fond"]."\"" ;
			  $lg .= "></TD>" ;
			  $vide = 0 ;
                         }
		        // Recherche releve correspondant
                        $releve = id_releve_edt ($cell [$k][$j][1],$dt,$cell [$k][$j][13]) ;
			If ($cell [$k][$j][8] > 1)
		 	 {
			  // Mise en place des cellules d'affichage de la discipline
			  $lg .= "<TD ALIGN=CENTER" ;
			  If (IsSet ($cl_saisie))
			   {
			    $lg .= " BGCOLOR=\"".$cl_saisie [$num_cl%$cl_saisie [0]+1]."\"" ;
			    $t_h [$j][$i][3] = $num_cl%$cl_saisie [0]+1 ; // Numero de la couleur de fond
			    $num_cl++ ;
                           }
			  $lg .= " COLSPAN=\"".$cell [$k][$j][8]."\">" ; //.$cell [$k][$j][12] ;
			  $lg .= "&nbsp;<FONT SIZE=\"".$l ["titre"]."\"><B TITLE=\"Enseignant : ".$cell [$k][$j][2]." - Salle : ".$cell [$k][$j][6]."\">" ;
			  // Affichage de la matiere
			  $lg .= $cell [$k][0][3] ;
			  // Calcul la duree de la sequence et l'affiche
			  $temps = Date ("H:i:s", MkTime (0,(integer)$duree_s*$cell [$k][$j][8],0,Date ("m"),Date("d"),Date("Y"))) ;
			  If (SubStr ($temps, 0, 1) == "0") { $lg .= "&nbsp;(".SubStr ($temps, 1, 1)."H".SubStr ($temps, 3, 2).")" ; }
			  Else { $lg .= "&nbsp;(".SubStr ($temps, 0, 2)."H".SubStr ($temps, 3, 2).")" ; }
			  //If ($cell [$k][$j][10] != "") { $lg .= " (".$cell [$k][$j][10].")" ; }
			  $lg .= "</B></FONT>&nbsp;</TD>" ;
			  For ($m = 0 ; $m < $cell [$k][$j][8] ; $m++)
			   {
			    $cell [$k][$j+$m][9] = 2 ;
                           }
                          $inc = $cell [$k][$j][8] ;
			  $ok = 1 ;
			  $t_h [$j][$i][0] = $cell [$k][0][0] ; // Discipline
			  $t_h [$j][$i][1] = $cell [$k][$j][8] ; // Duree
			  // Numero groupe
			  // Y a t-il un eleve dans le groupe si le groupe <> 0 ?
			  If ($ne_suit_pas_edt == 1)
			   {
			    $el_ok = 1 ;
			    If ($cell [$k][$j][12] > 0)
			     {
			      $grps = SQL_commande ("SELECT id_abs_groupe_eleve FROM abs_groupes_eleve WHERE abs_groupe_classe='".$cell [$k][$j][12]."' LIMIT 1", $id_sql) ;
			      If (SQL_nbr_lignes ($grps) > 0) { $el_ok = 1 ; } Else { $el_ok = 0 ; }
			     }
                            If ($el_ok == 1) { $t_h [$j][$i][2] = $cell [$k][$j][12] ; }
			    Else { $t_h [$j][$i][2] = 0 ; }
                           }
                          Else
			   { $t_h [$j][$i][2] = $cell [$k][$j][12] ; }
			  $t_h [$j][$i][7] = $cell [$k][0][6] ; // Code discipline
			  $t_h [$j][$i][8] = $cell [$k][0][4] ; // Id prof
			  $t_h [$j][$i][9] = $cell [$k][0][5] ; // Numen prof
			  // Y a t-il un releve ?
			  // Si releve alors mettre en place une image d'une couleur
			  //$rl .= "<TD HEIGHT=\"5\" BGCOLOR=\"" ; If ($releve > 0) { $rl .= $cl_releve_ok ; } Else { $rl .= $cl_releve_nok ; }
			  $rl .= "<TD HEIGHT=\"".($hauteur_releve+1)."\"" ;
			  $nbr_rel = 0 ;
			  For ($mm = 0 ; $mm < $cell [$k][$j][8] ; $mm++)
			   {
			    //$cell [$k][$j][1]
			    $releve = id_releve_suivant_edt ($cell [$k][0][4],$dt,$cell [$k][$j][13],$mm) ;
                            If ($releve > 0)
			     {
			      $t_h [$j+$mm][$i][4] = 1 ;
			      $t_h [$j+$mm][$i][5] = $releve ;
			      $t_h [$j+$mm][$i][6] = $cell [$k][$j][13+$mm] ; // Tranche horaire
			      $nbr_rel++ ;
                             }
                            Else
			     {
			      $t_h [$j+$mm][$i][4] = 0 ;
			      $t_h [$j+$mm][$i][5] = 0 ;
			      $t_h [$j+$mm][$i][6] = $cell [$k][$j][13+$mm] ; // Tranche horaire
                             }
                           }
                          $comp_h++ ;
			  $t_h [$j][$i][10] = $comp_h ; // Numero du releve
                          $rl .= " COLSPAN=\"".$cell [$k][$j][8]."\">" ;
			  $rl .= "<INPUT TYPE=HIDDEN NAME=\"releve_".$comp_h."_0\" VALUE=\"".$releve."\">" ;
			  $rl .= "<INPUT TYPE=HIDDEN NAME=\"releve_".$comp_h."_a\" VALUE=\"".$releve."\">" ;
			  $rl .= "<A HREF=\"javascript:change_releve(document.saisie.releve_".$comp_h."_1," ;
			  $rl .= "document.saisie.releve_".$comp_h."_0,document.saisie.releve_".$comp_h."_a,'".$gestion ["releve_ok"]."','".$gestion ["releve_non_ok"]."')\">" ;
			  $rl .= "<IMG NAME=\"releve_".$comp_h."_1\" SRC=\"" ;
			  //If ($releve > 0)
			  If ($nbr_rel == $cell [$k][$j][8]) { $rl .= $gestion ["releve_ok"] ; } Else { $rl .= $gestion ["releve_non_ok"] ; }
			  //$rl .= "<FONT SIZE=\"-3\"></FONT></TD>" ;
			  $rl .= "\" WIDTH=\"".(51*$cell [$k][$j][8])."\" HEIGHT=\"".$hauteur_releve."\" BORDER=0></A></TD>" ;
                         }
                        Else
			 {
			  $lg .= "<TD ALIGN=CENTER" ;
			  If (IsSet ($cl_saisie))
			   {
			    $lg .= " BGCOLOR=\"".$cl_saisie [$num_cl%$cl_saisie [0]]."\"" ;
			    $t_h [$j][$i][3] = $num_cl%$cl_saisie [0]+1 ; // Numero de la couleur de fond
			    $num_cl++ ;
                           }
			  $lg .= ">".$cell [$k][$j][12] ;
			  $lg .= "<FONT SIZE=\"".$l ["titre"]."\">".$cell [$k][0][3] ;
			  If ($cell [$k][$j][10] != "") { $lg .= " (".$cell [$k][$j][10].")" ; }
			  $lg .= "</FONT>&nbsp;</TD>" ;
			  $cell [$k][$j][9] = 2 ;
			  $inc = 1 ;
			  $ok = 1 ;
			  $t_h [$j][$i][0] = $cell [$k][0][0] ; // Discipline
			  $t_h [$j][$i][1] = 1 ; // Duree
			  //$t_h [$j][$i][2] = $cell [$k][$j][12] ; // Numero groupe
			  // Numero groupe
			  // Y a t-il un eleve dans le groupe si le groupe <> 0 ?
			  If ($ne_suit_pas_edt == 1)
			   {
			    $el_ok = 1 ;
			    If ($cell [$k][$j][12] > 0)
			     {
			      $grps = SQL_commande ("SELECT id_abs_groupe_eleve FROM abs_groupes_eleve WHERE abs_groupe_classe='".$cell [$k][$j][12]."' LIMIT 1", $id_sql) ;
			      If (SQL_nbr_lignes ($grps) > 0) { $el_ok = 1 ; } Else { $el_ok = 0 ; }
			     }
                            If ($el_ok == 1) { $t_h [$j][$i][2] = $cell [$k][$j][12] ; }
			    Else { $t_h [$j][$i][2] = 0 ; }
                           }
                          Else
			   { $t_h [$j][$i][2] = $cell [$k][$j][12] ; }
			  $t_h [$j][$i][7] = $cell [$k][0][6] ; // Code discipline
			  $t_h [$j][$i][8] = $cell [$k][0][4] ; // Id prof
			  $t_h [$j][$i][9] = $cell [$k][0][5] ; // Numen prof
			  // Y a t-il un releve ?
			  // Si releve alors mettre en place une image d'une couleur
			  //$rl .= "<TD HEIGHT=\"5\" BGCOLOR=\"" ; If ($releve > 0) { $rl .= $cl_releve_ok ; } Else { $rl .= $cl_releve_nok ; }
			  $rl .= "<TD HEIGHT=\"".($hauteur_releve+1)."\"" ;
			  $nbr_rel = 0 ;
			  For ($mm = 0 ; $mm < $cell [$k][$j][8] ; $mm++)
			   {
			    $releve = id_releve_suivant_edt ($cell [$k][$j][1],$dt,$cell [$k][$j][13],$mm) ;
                            If ($releve > 0)
			     {
			      $t_h [$j+$mm][$i][4] = 1 ; // Releve effectue
			      $t_h [$j+$mm][$i][5] = $releve ; // Id releve
			      $t_h [$j+$mm][$i][6] = $cell [$k][$j][13+$mm] ; // Tranche horaire
			      $nbr_rel++ ;
                             }
                            Else
			     {
			      $t_h [$j+$mm][$i][4] = 0 ; // Releve non effectue
			      $t_h [$j+$mm][$i][5] = 0 ; // Id releve
			      $t_h [$j+$mm][$i][6] = $cell [$k][$j][13+$mm] ; // Tranche horaire
                             }
                           }
                          $comp_h++ ;
			  $t_h [$j][$i][10] = $comp_h ; // Numero du releve
			  $rl .= " COLSPAN=\"".$cell [$k][$j][8]."\">" ;
			  $rl .= "<INPUT TYPE=HIDDEN NAME=\"releve_".$comp_h."_0\" VALUE=\"".$releve."\">" ;
			  $rl .= "<INPUT TYPE=HIDDEN NAME=\"releve_".$comp_h."_a\" VALUE=\"".$releve."\">" ;
			  $rl .= "<A HREF=\"javascript:change_releve(document.saisie.releve_".$comp_h."_1," ;
			  $rl .= "document.saisie.releve_".$comp_h."_0,document.saisie.releve_".$comp_h."_a,'".$gestion ["releve_ok"]."','".$gestion ["releve_non_ok"]."')\">" ;
			  $rl .= "<IMG NAME=\"releve_".$comp_h."_1\" SRC=\"" ;
			  //If ($releve > 0)
			  If ($nbr_rel == $cell [$k][$j][8]) { $rl .= $gestion ["releve_ok"] ; } Else { $rl .= $gestion ["releve_non_ok"] ; }
			  //$rl .= "<FONT SIZE=\"-3\"></FONT></TD>" ;
			  $rl .= "\" WIDTH=\"".(51*$cell [$k][$j][8])."\" HEIGHT=\"".$hauteur_releve."\" BORDER=0></A></TD>" ;
			 }
		       }
                      Else
		       {
		        //$lg .= "<TD ROWSPAN=2></TD>" ;
			//$rl .= "<TD></TD>" ;
			$vide++ ;
			$inc = 1 ;
			$t_h [$j][$i][0] = 0 ; // Discipline
			$t_h [$j][$i][1] = 1 ; // Duree
			$t_h [$j][$i][2] = 0 ; // Numero groupe
			$t_h [$j][$i][4] = 0 ; // Releve non effectue
			$t_h [$j][$i][5] = 0 ; // Id releve
			$t_h [$j][$i][6] = $cell [$k][$j][13] ; // Tranche horaire
			$t_h [$j][$i][7] = 0 ; // Code discipline
			$t_h [$j][$i][8] = 0 ; // Id prof
			$t_h [$j][$i][9] = "" ; // Numen prof
			$t_h [$j][$i][10] = 0 ; // Numero du releve
		       }
		      $j = $j + $inc ;
                     }
                    // Comble le vide final
		    If ($vide > 0)
		     {
		      $lg .= "<TD ROWSPAN=2" ; If ($vide > 1) { $lg .= " COLSPAN=\"".$vide."\"" ; }
		      //$lg .= " STYLE=\"border-color:".$l ["couleur_fond"]."\"" ;
		      $lg .= "></TD>" ;
		      $vide = 0 ;
                     }
                    If ($ok)
		     {
		      $aff1 [$nbr] = "<TR>".$rl."</TR>" ; $nbr++ ;
		      $aff1 [$nbr] = "<TR>".$lg."</TR>" ; $nbr++ ;
                     }
                   }
                  $t_h [0][0][0] = $nbr ;
		  $nombre_disciplines = $comp_h ;
		  // Creation du tableau des heures et des releves
		  $hs = "" ;
		  $rf = HexDec (SubStr ($l ["lien"], 1, 2)) ;
		  $bf = HexDec (SubStr ($l ["lien"], 3, 2)) ;
		  $vf = HexDec (SubStr ($l ["lien"], 5, 2)) ;
		  For ($i = 1 ; $i <= $max ; $i++)
		   {
		    //$hs .= "<TD ALIGN=CENTER>&nbsp;<FONT SIZE=\"-1\">".$heures_debut [$i]."</FONT>&nbsp;</TD>" ;
		    $hs .= "<TD ALIGN=\"CENTER\" WIDTH=\"".$largeur_cellule."\"><IMG SRC=\"../images/absences/heure.php?texte=" ;
		    $hs .= Str_Replace (":", "H", $heures_debut [$i])."&rf=".$rf."&bf=".$bf."&vf=".$vf."&rt=0&vt=0&vt=0\" BORDER=\"0\"></TD>" ;
                   }
                  
		  // Mise en page : Entetes
		  $aff  = "\n<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"saisie\" METHOD=\"POST\">\n" ;
		  $aff .= "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">\n" ;
		  $aff .= "<INPUT TYPE=HIDDEN NAME=\"saisie\" VALUE=\"1\">\n" ;
		  $aff .= "<INPUT TYPE=HIDDEN NAME=\"dt\" VALUE=\"".$dt."\">\n" ;
		  $aff .= "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">\n" ;
		  $aff .= "<INPUT TYPE=HIDDEN NAME=\"nbr_el\" VALUE=\"".SQL_nbr_lignes ($eleves)."\">\n" ;
		  $aff .= "<TABLE BORDER=\"1\" CELLPADDING=\"0\" CELLSPACING=\"0\" ALIGN=\"CENTER\" BGCOLOR=\"".$l ["couleur_fond"]."\"" ;
		  $aff .= " STYLE=\"border:1px solid #000000;border-collapse:collapse\">" ;
		  $aff .= "<TR BGCOLOR=\"".$l ["lien"]."\">\n" ;
		  $aff .= "<TD" ;
		  If ($nbr > 2)
		   {
		    $aff .= " ROWSPAN=\"".($nbr+2)."\"" ;
		    $aff .= " VALIGN=\"BOTTOM\">&nbsp;&Eacute;l&egrave;ves&nbsp;</TD>" ;
		    $aff .= $hs ;
		    $aff .= "</TR>\n" ;
		   }
                  Else
		   {
		    If ($nbr > 0) { $aff .= " ROWSPAN=\"".($nbr+2)."\"" ; }
		    $aff .= " VALIGN=\"BOTTOM\">&nbsp;&Eacute;l&egrave;ves&nbsp;</TD>" ;
                   }
		  $i = $nbr ;
		  While ($i > 0)
		   { $aff .= $aff1 [$i-1] ; $i-- ; }
                  $aff .= "<TR BGCOLOR=\"".$l ["lien"]."\">\n" ;
                  $aff .= $hs."</TR>\n" ;
		  
		  // Parcours les eleves
                  For ($i = 0 ; $i < SQL_nbr_lignes ($eleves) ; $i++)
		   {
		    If ($i > 0) { $aff .= "<INPUT TYPE=\"HIDDEN\" NAME=\"n_".($i-1)."_0\" VALUE=\"".$comp_h."\">\n" ; }
		    $el = SQL_tableau_associatif ($eleves, "") ;
		    /*
		    If (StrPos ($el ["prenoms"], " ")) { $prenom = SubStr ($el ["prenoms"], 0, StrPos ($el ["prenoms"], " ")) ; }
                    Else { $prenom = $el ["prenoms"] ; }
		    $prenom = StrToUpper (SubStr ($prenom, 0, 1)).StrToLower (SubStr ($prenom, 1, StrLen ($prenom)-1)) ;
		    */
		    $prenom = prenom_eleve ($el ["prenoms"]) ;
		    $aff .= "<TR" ;
		    If ($i%2) { $aff .= " BGCOLOR=\"".$l ["nom"]."\"" ; } Else { $aff .= " BGCOLOR=\"#FFFFFF\"" ; }
		    $aff .= ">" ;
		    $aff .= "<TD>" ;
		    // Icone fiche eleve
		    $aff .= "<A HREF=\"javascript:ouvrefenetre('./fiche_eleve.php?id_eleve=".$el ["id_eleve"]."&code=".$_SESSION ["code"]."',470,570,'yes');\">" ;
                    $aff .= "<IMG SRC=\"../images/fiche.png\" TITLE=\"Acc&egrave;s fiche de ".$el ["nom"]." ".$prenom."\" BORDER=\"0\"></A>" ;
		    $nombre_images++ ;
		    // Recherche memo notes
                    $aff .= icone_notes ($el ["id_eleve"], $el ["repere1"], $el ["repere2"], $el ["nom"]." ".$prenom) ;
		    // Recherche publipostage
		    $aff .= icone_publipostage ($el ["id_eleve"], $el ["repere1"], $el ["repere2"], $el ["nom"]." ".$prenom, $dt) ;
		    $aff .= "&nbsp;<B><FONT SIZE=\"".$l ["titre"]."\">".$el ["nom"]."&nbsp;<I>".$prenom."</I></FONT></B>&nbsp;" ;
		    $aff .= "<INPUT TYPE=\"HIDDEN\" NAME=\"el_".$i."\" VALUE=\"".$el ["id_eleve"]."\">" ;
		    $aff .= "<INPUT TYPE=\"HIDDEN\" NAME=\"r1_".$i."\" VALUE=\"".$el ["repere1"]."\">" ;
		    $aff .= "<INPUT TYPE=\"HIDDEN\" NAME=\"r2_".$i."\" VALUE=\"".$el ["repere2"]."\">" ;
		    $aff .= "</TD>" ;
		    $j = 1 ;
		    $comp_h = 0 ;
		    $vide = 0 ;
		    // Parcours les heures
		    While ($j <= $max)
		     {
		      $inc = 1 ;
                      $ok = 0 ;
		      // Parcours les cours en groupe
		      For ($k = 1 ; $k <= $t_h [0][0][0] ; $k++)
		       {
		        // Si l'eleve fait parti du cours en groupe alors activer
		        If (($t_h [$j][$k][2] > 0) And ($t_h [$j][$k][1] > 1) And ($t_h [$j][$k][0] > 0))
		         {
			  If (groupe_eleve_edt ($el ["id_eleve"], $t_h [$j][$k][2]) > 0)
			   {
			    // COURS EN GROUPE
			    // Comble le vide
		            If ($vide > 0)
		             {
		              $aff .= "<TD BGCOLOR=\"".$l ["lien"]."\" BACKGROUND=\"../images/absences/pas_cours.gif\"" ;
		              If ($vide > 1) { $aff .= " COLSPAN=\"".$vide."\"" ; }
		              $lg .= ">&nbsp;</TD>" ;
		              $vide = 0 ;
                             }
			    $aff .= "<TD COLSPAN=\"".$t_h [$j][$k][1]."\" ALIGN=CENTER vALIGN=MIDDLE" ;
			    If (!($i%2) And (IsSet ($cl_saisie))) { $aff .= " BGCOLOR=\"".$cl_saisie [$t_h [$j][$k][3]]."\"" ; }
			    $aff .= ">" ;
			    If ($t_h [$j][$k][4] == 1)
			     {
			      // Releve effectue donc lecture
			      $rens = renseignements_saisie_edt ($dt,$t_h [$j][$k][6],$el ["id_eleve"]) ;
			      $ok3 = 0 ;
			      If ($rens [0] > 0)
			       {
		                For ($m = 1 ; $m <= $s [0][0] ; $m++)
	                         {
		                  If ($rens [2] == $s [$m][0])
				   {
				    $comp_h++ ;
				    $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
				    If ($el ["sexe"] == "F")
				     {
				      $aff.= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ;
				      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"".$s [$m][6]."\"></A>" ;
                                     }
                                    Else
				     {
				      $aff.= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ;
				      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"".$s [$m][8]."\"></A>" ;
                                     }
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$rens [2]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
				    If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				    Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				    $jvsc [$t_h [$j][$k][10]][1] = 1 ;
				    For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
				     {
				      $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                                     }
				    $ok3 = 1 ;
                                   }
                                 }
		               }
			      If ($ok3 == 0)
			       {
			        $comp_h++ ;
			        $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ; 
				If ($el ["sexe"] == "F") { $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; } Else { $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; }
			        $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"../images/absences/alheure.png\"></A>" ;
			        $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
				//$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][5]."\">" ;
				If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				$jvsc [$t_h [$j][$k][10]][1] = 1 ;
				For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
				 {
				  $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                                 }
                               }
		              $aff .= "&nbsp;</TD>" ; //G".$t_h [$j][$k][2].$a."&nbsp;</TD>" ;
                             }
                            Else
			     {
			      $comp_h++ ;
			      $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
			      If ($el ["sexe"] == "F") { $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; } Else { $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; }
			      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"../images/absences/alheure.png\"></A>" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
                              $aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
			      //$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
			      If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
			      Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
			      $jvsc [$t_h [$j][$k][10]][1] = 0 ;
			      For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
			       {
			        $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                               }
		              $aff .= "&nbsp;</TD>" ; //G".$t_h [$j][$k][2].$a."&nbsp;</TD>" ;
			     }
			    $ok = 1 ;
			    $inc = $t_h [$j][$k][1] ;
                           }
                         }
                       }
                      // Non attribue : Classe entiere ?
                      If ($ok == 0)
		       {
		        // Parcours les cours en classe entiere
		        For ($k = 1 ; $k <= $t_h [0][0][0] ; $k++)
		         {
			  // Si l'eleve fait parti du cours en classe entiere alors activer
			  If (($t_h [$j][$k][1] > 1) And ($t_h [$j][$k][2] == 0) And ($t_h [$j][$k][0] > 0))
			   {
			    // CLASSE ENTIERE
			    // Comble le vide
		            If ($vide > 0)
		             {
		              $aff .= "<TD BGCOLOR=\"".$l ["lien"]."\" BACKGROUND=\"../images/absences/pas_cours.gif\"" ;
		              If ($vide > 1) { $aff .= " COLSPAN=\"".$vide."\"" ; }
		              $lg .= ">&nbsp;</TD>" ;
		              $vide = 0 ;
                             }
			    $aff .= "<TD COLSPAN=\"".$t_h [$j][$k][1]."\" ALIGN=CENTER vALIGN=MIDDLE" ;
			    If (!($i%2) And (IsSet ($cl_saisie))) { $aff .= " BGCOLOR=\"".$cl_saisie [$t_h [$j][$k][3]]."\"" ; }
			    $aff .= ">" ;
			    If ($t_h [$j][$k][4] == 1)
			     {
			      // Releve effectue donc lecture
			      $rens = renseignements_saisie_edt ($dt,$t_h [$j][$k][6],$el ["id_eleve"]) ;
			      $ok3 = 0 ;
			      If ($rens [0] > 0)
			       {
		                For ($m = 1 ; $m <= $s [0][0] ; $m++)
	                         {
				  If ($rens [2] == $s [$m][0])
				   {
				    $comp_h++ ;
				    $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
				    If ($el ["sexe"] == "F")
				     {
				      $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ;
				      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"".$s [$m][6]."\"></A>" ;
                                     }
                                    Else
				     {
				      $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ;
				      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"".$s [$m][8]."\"></A>" ;
                                     }
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$rens [2]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
				    //$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][5]."\">" ;
				    If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				    Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				    $jvsc [$t_h [$j][$k][10]][1] = 1 ;
				    For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
				     {
				      $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                                     }
				    $ok3 = 1 ;
                                   }
                                 }
		               }
                              If ($ok3 == 0)
			       {
			        $comp_h++ ;
			        $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
				If ($el ["sexe"] == "F") { $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; } Else { $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; }
			        $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"../images/absences/alheure.png\"></A>" ;
			        $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
				//$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][5]."\">" ;
				If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				$jvsc [$t_h [$j][$k][10]][1] = 1 ;
				For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
				 {
				  $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                                 }
                               }
		              $aff .= "&nbsp;</TD>" ;
                             }
                            Else
			     {
			      $comp_h++ ;
			      $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
			      If ($el ["sexe"] == "F") { $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; } Else { $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; }
			      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"../images/absences/alheure.png\"></A>" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
			      $aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
			      //$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
			      If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
			      Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
			      $jvsc [$t_h [$j][$k][10]][1] = 0 ;
			      For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
			       {
			        $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                               }
		              $aff .= "&nbsp;</TD>" ;
			     }
			    $inc = $t_h [$j][$k][1] ;
			    $ok = 1 ;
                           }
                         }
		       }
                      // Non attribue : Pas de cours ou mauvais EDT
                      If ($ok == 0)
		       {
		        If ($t_h [$j][$k][4] == 1)
			 {
			  // Releve effectue donc lecture et activation
			  $rens = renseignements_saisie_edt ($dt,$t_h [$j][$k][6],$el ["id_eleve"]) ;
			      $ok3 = 0 ;
			      If ($rens [0] > 0)
			       {
		                For ($m = 1 ; $m <= $s [0][0] ; $m++)
	                         {
				  If ($rens [2] == $s [$m][0])
				   {
				    $comp_h++ ;
				    $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
				    If ($el ["sexe"] == "F")
				     {
				      $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ;
				      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"".$s [$m][6]."\"></A>" ;
                                     }
                                    Else
				     {
				      $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ;
				      $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"".$s [$m][8]."\"></A>" ;
                                     }
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$rens [2]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
				    $aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
				    //$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][5]."\">" ;
				    If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				    Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				    $jvsc [$t_h [$j][$k][10]][1] = 1 ;
				    For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
				     {
				      $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                                     }
				    $ok3 = 1 ;
                                   }
                                 }
		               }
                              If ($ok3 == 0)
			       {
			        $comp_h++ ;
			        $aff .= "<A HREF=\"javascript:change(document.saisie.image_".$i."_".$comp_h.",document.saisie.v_".$i."_".$t_h [$j][$k][10]."," ;
				If ($el ["sexe"] == "F") { $aff .= "1)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; } Else { $aff .= "0)\" TITLE=\"".$el ["nom"]." ".$prenom."\">" ; }
			        $aff .= "<IMG BORDER=0 NAME=\"image_".$i."_".$comp_h."\" SRC=\"../images/absences/alheure.png\"></A>" ;
			        $aff .= "<INPUT TYPE=HIDDEN NAME=\"v_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"0\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"t_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][6]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][1]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"g_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][2]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"p_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][8]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"num_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][9]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"d_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][0]."\">" ;
				$aff .= "<INPUT TYPE=HIDDEN NAME=\"cd_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][7]."\">" ;
				//$aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."\" VALUE=\"".$t_h [$j][$k][5]."\">" ;
				If ($jvsc [$t_h [$j][$k][10]][0]) { $jvsc [$t_h [$j][$k][10]][0] .= "    || (document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				Else { $jvsc [$t_h [$j][$k][10]][0] = "(document.saisie.v_".$i."_".$t_h [$j][$k][10].".value != 0)\n" ; }
				$jvsc [$t_h [$j][$k][10]][1] = 1 ;
				For ($mm = 0 ; $mm < $t_h [$j][$k][1] ; $mm++)
				 {
				  $aff .= "<INPUT TYPE=HIDDEN NAME=\"ar_".$i."_".$t_h [$j][$k][10]."_".$mm."\" VALUE=\"".$t_h [$j+$mm][$k][5]."\">" ;
                                 }
                               }
		              $aff .= "&nbsp;</TD>" ;
                         }
                        Else
			 {
		          //$aff .= "<TD BGCOLOR=\"".$l ["lien"]."\" BACKGROUND=\"../images/absences/pas_cours.gif\">&nbsp;</TD>" ;
			  $vide++ ;
                         }
                       }
		      $j += $inc ;
                     }
                    // Comble le vide final
		    If ($vide > 0)
		     {
		      $aff .= "<TD BGCOLOR=\"".$l ["lien"]."\" BACKGROUND=\"../images/absences/pas_cours.gif\"" ;
		      If ($vide > 1) { $aff .= " COLSPAN=\"".$vide."\"" ; }
		      $lg .= ">&nbsp;</TD>" ;
		      $vide = 0 ;
                     }
                    $aff .= "</TR>" ;
		   }
                  $aff .= "<INPUT TYPE=HIDDEN NAME=\"n_".($i-1)."_0\" VALUE=\"".$comp_h."\">\n" ;
                  $aff .= "</TABLE>\n" ;
		  // Script de changement automatique des releves
		  Echo "<SCRIPT>\n" ;
		  Echo " function change_auto()\n" ;
		  Echo "  {\n" ;
		  For ($mm = 1 ; $mm <= $nombre_disciplines ; $mm++)
		   {
		    If (($jvsc [$mm][1] == 0) And ($jvsc [$mm][0]))
		     {
		      Echo "   if (document.saisie.releve_".$mm."_a.value==0)\n" ;
		      Echo "    {\n" ;
		      Echo "     if (".$jvsc [$mm][0].")\n" ;
		      Echo "      {\n" ;
		      Echo "       document.saisie.releve_".$mm."_0.value='1'\n" ;
		      Echo "       document.saisie.releve_".$mm."_1.src='".$gestion ["releve_ok"]."'\n" ;
		      Echo "      }\n" ;
		      Echo "     else\n" ;
		      Echo "      {\n" ;
		      Echo "       document.saisie.releve_".$mm."_0.value='0'\n" ;
		      Echo "       document.saisie.releve_".$mm."_1.src='".$gestion ["releve_non_ok"]."'\n" ;
		      Echo "      }\n" ;
		      Echo "    }\n" ;
                     }
		   }
		  Echo "   setTimeout ('change_auto()',100)\n" ;
                  Echo "  }\n" ;
                  Echo "</SCRIPT>\n" ;
		  Echo "<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>" ;
		  Echo "<TR>" ;
		  Echo "<TD vALIGN=TOP>" ;
		  Echo "<TABLE BORDER=1 CELLPADDING=0 CELLSPACING=0 STYLE=\"border:1px solid #000000;border-collapse:collapse\" BGCOLOR=\"".$l ["couleur_fond"]."\">" ;
		  Echo "<TR>" ;
		  $dt_precedent = SQL_commande ("SELECT date FROM abs_calendrier WHERE ouvrable='1' AND date<'".$dt."' ORDER BY date DESC LIMIT 1", $id_sql) ;
		  If (SQL_nbr_lignes ($dt_precedent) > 0)
		   {
		    $dt_s = SQL_ligne_suivante ($dt_precedent) ;
		    Echo "<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"jour_precedent\" METHOD=\"POST\">\n" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"choix_date\" VALUE=\"1\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_jour\" VALUE=\"".SubStr ($dt_s [0], 8, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_mois\" VALUE=\"".SubStr ($dt_s [0], 5, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_annee\" VALUE=\"".SubStr ($dt_s [0], 0, 4)."\">" ;
		    $titre = "Jour pr&eacute;c&eacute;dent : ".$nom_jour [(integer)Date ("w",MkTime(0,0,0,(integer)SubStr ($dt_s [0], 5, 2),(integer)SubStr ($dt_s [0], 8, 2),(integer)SubStr ($dt_s [0], 0, 4)))] ;
		    $titre .= " ".SubStr ($dt_s [0], 8, 2)." ".$nom_mois [(integer)SubStr ($dt_s [0], 5, 2)]." ".SubStr ($dt_s [0], 0, 4) ;
		    Echo "<TD vALIGN=TOP>&nbsp;<INPUT TYPE=IMAGE SRC=\"../images/absences/fleche_gauche.png\" BORDER=0 NAME=\"".$titre."\" TITLE=\"".$titre."\">&nbsp;</TD>" ;
		    Echo "</FORM>" ;
                   }
		  Echo "<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"choix_jour\" METHOD=\"POST\">\n" ;
		  Echo "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">" ;
		  Echo "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">" ;
		  Echo "<INPUT TYPE=HIDDEN NAME=\"choix_date\" VALUE=\"1\">" ;
		  Echo "<TD ALIGN=CENTER>&nbsp;<SELECT NAME=\"num_jour\">" ;
		  For ($i = 1 ; $i < 32 ; $i++)
		   {
		    Echo "<OPTION VALUE=\"" ; If ($i < 10) { Echo "0" ; }
		    Echo $i."\"" ;
		    If ((integer)SubStr ($dt, 8, 2) == $i) { Echo " SELECTED" ; }
		    Echo ">".$i."</OPTION>" ;
		   }
		  Echo "</SELECT><SELECT NAME=\"num_mois\">" ;
		  For ($i = 1 ; $i < 13 ; $i++)
		   {
		    Echo "<OPTION VALUE=\"" ; If ($i < 10) { Echo "0" ; }
		    Echo $i."\"" ;
		    If ((integer)SubStr ($dt, 5, 2) == $i) { Echo " SELECTED" ; }
		    Echo ">".$nom_mois [$i]."</OPTION>" ;
		   }
		  Echo "</SELECT><SELECT NAME=\"num_annee\">" ;
		  For ($i = Date ("Y")-1 ; $i <= Date ("Y")+1 ; $i++)
		   {
		    Echo "<OPTION VALUE=\"" ; If ($i < 10) { Echo "0" ; }
		    Echo $i."\"" ;
		    If ((integer)SubStr ($dt, 0, 4) == $i) { Echo " SELECTED" ; }
		    Echo ">".$i."</OPTION>" ;
		   }
		  Echo "</SELECT><INPUT TYPE=IMAGE SRC=\"../images/absences/ajouter.png\" NAME=\"Choisir.\" TITLE=\"Choisir cette date.\">&nbsp;</TD>" ;
		  Echo "</FORM>" ;
		  $dt_suivant = SQL_commande ("SELECT date FROM abs_calendrier WHERE ouvrable='1' AND date>'".$dt."' ORDER BY date ASC LIMIT 1", $id_sql) ;
		  If (SQL_nbr_lignes ($dt_suivant) > 0)
		   {
		    $dt_s = SQL_ligne_suivante ($dt_suivant) ;
		    Echo "<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"jour_suivant\" METHOD=\"POST\">\n" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"choix_date\" VALUE=\"1\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_jour\" VALUE=\"".SubStr ($dt_s [0], 8, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_mois\" VALUE=\"".SubStr ($dt_s [0], 5, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_annee\" VALUE=\"".SubStr ($dt_s [0], 0, 4)."\">" ;
		    $titre = "Jour suivant : ".$nom_jour [(integer)Date ("w",MkTime(0,0,0,(integer)SubStr ($dt_s [0], 5, 2),(integer)SubStr ($dt_s [0], 8, 2),(integer)SubStr ($dt_s [0], 0, 4)))] ;
		    $titre .= " ".SubStr ($dt_s [0], 8, 2)." ".$nom_mois [(integer)SubStr ($dt_s [0], 5, 2)]." ".SubStr ($dt_s [0], 0, 4) ;
		    Echo "<TD vALIGN=TOP>&nbsp;<INPUT TYPE=IMAGE SRC=\"../images/absences/fleche_droite.png\" BORDER=0 NAME=\"".$titre."\" TITLE=\"".$titre."\">&nbsp;</TD>" ;
		    Echo "</FORM>" ;
                   }
		  Echo "</TR>" ;
		  Echo "</TABLE>" ;
		  Echo "</TD>" ;
		  Echo "<TD>&nbsp;&nbsp;</TD>" ;
		  Echo "<TD><B><FONT SIZE=\"+1\"><FONT COLOR=\"#0000FF\"><I>".nom_classe_long_parid ($id_classe) ;
		  Echo "</I></FONT>&nbsp;(".nom_classe_bref_parid ($id_classe).")</B>&nbsp;" ;
		  Echo "pour&nbsp;le&nbsp;<B>".$nom_jour [(integer)Date ("w", MkTime (0,0,0,SubStr ($dt, 5, 2),SubStr ($dt, 8, 2),SubStr ($dt, 0, 4)))] ;
		  Echo "&nbsp;".SubStr ($dt, 8, 2)."&nbsp;".$nom_mois [(integer)SubStr ($dt, 5, 2)]."&nbsp;".SubStr ($dt, 0, 4)."</B></FONT></TD>\n" ;
		  Echo "<TD></TD>" ;
		  Echo "</TR>" ;
		  If ($message == 1)
		   {
		    Echo "<TR>" ;
		    Echo "<TD ALIGN=CENTER COLSPAN=3><FONT COLOR=\"#FF0000\"><BLINK><B>Modification(s)&nbsp;effectu&eacute;e(s)&nbsp;!</B></BLINK></FONT></TD>" ;
		    Echo "</TR>" ;
		   }
                  Echo "</TABLE><BR>" ;
		  Echo $aff ;
		  Echo "<CENTER><INPUT TYPE=IMAGE SRC=\"../images/valider.png\" VALUE=\"Valider\"></CENTER>" ;
		  Echo "</FORM>\n" ;
		 }
                Else
		 {
		  // Jour non ouvrable
		  Echo "<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>" ;
		  Echo "<TR>" ;
		  Echo "<TD vALIGN=TOP>" ;
		  Echo "<TABLE BORDER=1 CELLPADDING=0 CELLSPACING=0 STYLE=\"border:1px solid #000000;border-collapse:collapse\" BGCOLOR=\"".$l ["couleur_fond"]."\">" ;
		  Echo "<TR>" ;
		  $dt_precedent = SQL_commande ("SELECT date FROM abs_calendrier WHERE ouvrable='1' AND date<'".$dt."' ORDER BY date DESC LIMIT 1", $id_sql) ;
		  If (SQL_nbr_lignes ($dt_precedent) > 0)
		   {
		    $dt_s = SQL_ligne_suivante ($dt_precedent) ;
		    Echo "<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"jour_precedent\" METHOD=\"POST\">\n" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"choix_date\" VALUE=\"1\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_jour\" VALUE=\"".SubStr ($dt_s [0], 8, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_mois\" VALUE=\"".SubStr ($dt_s [0], 5, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_annee\" VALUE=\"".SubStr ($dt_s [0], 0, 4)."\">" ;
		    $titre = "Jour pr&eacute;c&eacute;dent : ".$nom_jour [(integer)Date ("w",MkTime(0,0,0,(integer)SubStr ($dt_s [0], 5, 2),(integer)SubStr ($dt_s [0], 8, 2),(integer)SubStr ($dt_s [0], 0, 4)))] ;
		    $titre .= " ".SubStr ($dt_s [0], 8, 2)." ".$nom_mois [(integer)SubStr ($dt_s [0], 5, 2)]." ".SubStr ($dt_s [0], 0, 4) ;
		    Echo "<TD vALIGN=TOP>&nbsp;<INPUT TYPE=IMAGE SRC=\"../images/absences/fleche_gauche.png\" BORDER=0 NAME=\"".$titre."\" TITLE=\"".$titre."\">&nbsp;</TD>" ;
		    Echo "</FORM>" ;
                   }
		  Echo "<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"choix_jour\" METHOD=\"POST\">\n" ;
		  Echo "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">" ;
		  Echo "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">" ;
		  Echo "<INPUT TYPE=HIDDEN NAME=\"choix_date\" VALUE=\"1\">" ;
		  Echo "<TD ALIGN=CENTER>&nbsp;<SELECT NAME=\"num_jour\">" ;
		  For ($i = 1 ; $i < 32 ; $i++)
		   {
		    Echo "<OPTION VALUE=\"" ; If ($i < 10) { Echo "0" ; }
		    Echo $i."\"" ;
		    If ((integer)SubStr ($dt, 8, 2) == $i) { Echo " SELECTED" ; }
		    Echo ">".$i."</OPTION>" ;
		   }
		  Echo "</SELECT><SELECT NAME=\"num_mois\">" ;
		  For ($i = 1 ; $i < 13 ; $i++)
		   {
		    Echo "<OPTION VALUE=\"" ; If ($i < 10) { Echo "0" ; }
		    Echo $i."\"" ;
		    If ((integer)SubStr ($dt, 5, 2) == $i) { Echo " SELECTED" ; }
		    Echo ">".$nom_mois [$i]."</OPTION>" ;
		   }
		  Echo "</SELECT><SELECT NAME=\"num_annee\">" ;
		  For ($i = Date ("Y")-1 ; $i <= Date ("Y")+1 ; $i++)
		   {
		    Echo "<OPTION VALUE=\"" ; If ($i < 10) { Echo "0" ; }
		    Echo $i."\"" ;
		    If ((integer)SubStr ($dt, 0, 4) == $i) { Echo " SELECTED" ; }
		    Echo ">".$i."</OPTION>" ;
		   }
		  Echo "</SELECT><INPUT TYPE=IMAGE SRC=\"../images/absences/ajouter.png\" NAME=\"Choisir.\" TITLE=\"Choisir cette date.\">&nbsp;</TD>" ;
		  Echo "</FORM>" ;
		  $dt_suivant = SQL_commande ("SELECT date FROM abs_calendrier WHERE ouvrable='1' AND date>'".$dt."' ORDER BY date ASC LIMIT 1", $id_sql) ;
		  If (SQL_nbr_lignes ($dt_suivant) > 0)
		   {
		    $dt_s = SQL_ligne_suivante ($dt_suivant) ;
		    Echo "<FORM ACTION=\"".$_SERVER ["PHP_SELF"]."\" NAME=\"jour_suivant\" METHOD=\"POST\">\n" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"id_classe\" VALUE=\"".$id_classe."\">" ;
                    Echo "<INPUT TYPE=HIDDEN NAME=\"menu\" VALUE=\"".$menu."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"choix_date\" VALUE=\"1\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_jour\" VALUE=\"".SubStr ($dt_s [0], 8, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_mois\" VALUE=\"".SubStr ($dt_s [0], 5, 2)."\">" ;
		    Echo "<INPUT TYPE=HIDDEN NAME=\"num_annee\" VALUE=\"".SubStr ($dt_s [0], 0, 4)."\">" ;
		    $titre = "Jour suivant : ".$nom_jour [(integer)Date ("w",MkTime(0,0,0,(integer)SubStr ($dt_s [0], 5, 2),(integer)SubStr ($dt_s [0], 8, 2),(integer)SubStr ($dt_s [0], 0, 4)))] ;
		    $titre .= " ".SubStr ($dt_s [0], 8, 2)." ".$nom_mois [(integer)SubStr ($dt_s [0], 5, 2)]." ".SubStr ($dt_s [0], 0, 4) ;
		    Echo "<TD vALIGN=TOP>&nbsp;<INPUT TYPE=IMAGE SRC=\"../images/absences/fleche_droite.png\" BORDER=0 NAME=\"".$titre."\" TITLE=\"".$titre."\">&nbsp;</TD>" ;
		    Echo "</FORM>" ;
                   }
		  Echo "</TR>" ;
		  Echo "</TABLE>" ;
		  Echo "</TD>" ;
		  Echo "<TD>&nbsp;&nbsp;</TD>" ;
		  Echo "<TD><B><FONT SIZE=\"+1\">Saisie&nbsp;:&nbsp;<FONT COLOR=\"#0000FF\"><I>".nom_classe_long_parid ($id_classe) ;
		  Echo "</I></FONT>&nbsp;(".nom_classe_bref_parid ($id_classe).")</B>&nbsp;" ;
		  Echo "pour&nbsp;le&nbsp;<B>".$nom_jour [(integer)Date ("w", MkTime (0,0,0,SubStr ($dt, 5, 2),SubStr ($dt, 8, 2),SubStr ($dt, 0, 4)))] ;
		  Echo "&nbsp;".SubStr ($dt, 8, 2)."&nbsp;".$nom_mois [(integer)SubStr ($dt, 5, 2)]."&nbsp;".SubStr ($dt, 0, 4)."</B></FONT><BR><BR>" ;
	          Echo "<U>Jour&nbsp;non&nbsp;ouvrable</U>&nbsp;:&nbsp;Pas&nbsp;de&nbsp;saisie&nbsp;possible&nbsp;!</TD>\n" ;
		  Echo "<TD></TD>" ;
		  Echo "</TR>" ;
                  Echo "</TABLE>" ;
		 }
	       }
              Else
	       {
	        // Pas d'eleves dans cette classe
		Echo "<CENTER><B><FONT SIZE=\"+1\">Saisie&nbsp;:&nbsp;<FONT COLOR=\"#0000FF\"><I>".nom_classe_long_parid ($id_classe) ;
                Echo "</I></FONT>&nbsp;(".nom_classe_bref_parid ($id_classe).")</B>&nbsp;" ;
		Echo "pour&nbsp;le&nbsp;<B>".$nom_jour [(integer)Date ("w", MkTime (0,0,0,SubStr ($dt, 5, 2),SubStr ($dt, 8, 2),SubStr ($dt, 0, 4)))] ;
		Echo "&nbsp;".SubStr ($dt, 8, 2)."&nbsp;".$nom_mois [(integer)SubStr ($dt, 5, 2)]."&nbsp;".SubStr ($dt, 0, 4)."</B></FONT><BR><BR>" ;
	        Echo "<U>Il&nbsp;n&nbsp;y&nbsp;a&nbsp;aucun&nbsp;&eacute;l&egrave;ves&nbsp;dans&nbsp;cette&nbsp;classe</U>!" ;
	       }
              Echo "<SCRIPT>\n" ;
              Echo " change_auto()\n" ;
              Echo "</SCRIPT>\n" ;
              Echo " </BODY>\n" ;
	      Echo "</HTML>\n" ;
?>